CON

  _clkmode = xtal1 + pll16x
  _xinfreq = 5_000_000



var



pub go


'  cognew(@entry,0)
'{
  dira[0]~~
  repeat
    !outa[0]
'}

dat

        org

entry

        mov t0,#1
        shl t0,par
        or  dira,t0
loop    xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        xor outa,t0
        jmp #loop



t0      res 1
